



The journal for technical 
applications of T/S 
computers 





The Old Order Changeth 


This is the first issue for which Basil wears the mantle, Not, fortunately, the mantel, 

as issue V:1 reported. (Jocelyn remarked that cleaning and pressing a mantel sounds like 
something out of the gymnasium.) But typographical errors, like the poor, will be with us 
always, and we apologize in advance for those that will inevitably slip through. Basil's 
letter of self-introduction appears in this issue's FORUM column. 


Intelligence About Sir Clive 


Writing as Chairman of British MENSA, Sir Clive Sinclair published a very provocative 
article about Artificial Intelligence. He predicts an assembly of ten-to-the-fourteenth 
components, each in the order of a tenth of a micron in diameter, yielding an artificial 
brein with a capacity comparable to that of its human counterpart, in a 10-centimeter 
cube. 


He foresees a "low unit cost", and continues: "The basic raw material, 170 grams of 
silicon, is not expensive, the energy input is not high, and given known redundancy 
techniques, production yields should be no problem. Production time should be extremely 
short compared with the competing biological product." 


Now "all" we need is the engineering. 


Vive Le Z88! 


Lawrence (Larry) Chavarie of Ottawa sends us his masterly translation of an article from 
the French publication "Science et Vie" (Science and Life). The review describes the 288 
as embodying technical features that stun ("etonne"), being loaded with gadgets 
("l'ensemble est truffe d'astuces"), and incorporating "une memoire d'elephant". 


Just as our daisy wheel doesn't handle French accents, so do speakers of French criticize 

the 288 keyboard. Not only are the accents missing, but the French conventional keyboard 

is not QVERT..., but something starting AZERTY. The acronyms EPROM and WYSIWYG (What You 
See is What You Get) are unchanged in French, though. Eh bien, plus ca change... 


SWN EXCLUSIVE: PC-8300 Schematic This Issue! 







FOR YOUR SUPPORT 


FRANK LOCKHART, P.O. Box 1131, Shelby, NC 28150, 
(704)484-8539 offers programs in Engineering and 
Mathematics, as well as games and utilities for QL, 
TS1000, and TS2068 computers. Prices are $17.95 for 
QL (microdrive), $12.95 for 2068, and $8.95 for 

1000 (cassette). Program list free for SASE. 


ROBERT D. HARTUNG, 2416 No. County Line Rd., 
Huntertown, IN 46748, (219)637-3081 reports that 
BetaBasic programs should now be ordered through: 
Beta Soft, 24 Wyche Avenue, Kings Heath, Birmingham 
B14 6LQ, ENGLAND. For SPECTRUM and 
SPECTRUM-emulating 2068s. See SWN Vol. 5 No. 1 for 
a description of this program. Price is about 16 

pounds Sterling (one pound-$1.80 at this writing). 


Dan Elliott, Rt 1 Box 117, Cabool, MO 65689 is 
offering service for several different makes of 
home computers including the Timex-Sinclair line. 
Prices vary, so contact Dan to get the latest info. 
He is also offering to make mods to TS computers 
and peripherals per published articles. 


LEMKE SOFTWARE, 2144 White Oak, Wichita KS 67207, 
has put together the Pixel Print Press, a newletter 
highlighting Lemke Desktop Publishing software 

programs for the TS2068. Products shown include the 
popular Pixel Sketch & Graphics Editor, the new 

Pixel Print, an Icon Package, a Font Package, a 

Pixel Print Utility for Tasword, and Checkbook 

Budget Master. Send a SASE for the latest Lemke 
Software info. 





NICOLSON NIGHTIME NETWORK is a free BBS with a. 
Timex sort-of SIG operated by sort-of sysop Fred 
Nachbaur. (604) 354-4666 is the number to call to 

get access to the latest hi-res programs, files, 

etc. The BBS operates 1800-0900 PST every day and 

all day Sunday. Set your modem for 8-N-1 and give 

it a try. Complete details in a coming issue of 

SWN. 


JOHN MCMICHAEL, 1710 Palmer Dr., Laramie, WY 82070, 


is marketing hardware and software to interface the 
TS2068 to a Commodore 1520 Printer/Plotter. Prices 
for the hardware range from $14.95 for a bare board 
to $30.95 for an assembled and tested unit. The 
interface hardware includes driver/demo software. 
Other software packages include Pic-Plot, an auto 
screen dump utility, Bannerific, banner making 
software, and CMS/1520, a compatibility patch for 
Customized Mscript V5 or V5.2. Software is priced 
at $8.95 each, ppd. 


GREY & CLIFFORD COMPUTER PRODUCTS, P. O. Box 2186, 


Inglewood, CA 90305, (213) 759-7406, announces the 
release of the latest version of SPECTERM-64 
(TS-4.1). This latest release is available on 

either JLO Safe (v 2.3 or later) or AERCO disks. 
$35.00 + $3 S&H. Also new to the Grey a Clifford 
line of products is TMX-64, a 64-column BBS 
software package for the TS2068. The package is 
said to allow you to set up a 300/1200 baud BBS 
system on your TS2068 computer. Written by Kurt 
Casby, the price is $30.00 * $2 S&H. Call for 
details. 


TELECOMM UPDATE 


By Fred Nachbaur 


Attention ZX Users 


The ZX81/TS1000 family has traditional- 
ly been relegated to the  "back- 
waters" of various BBS's and communicat- 
ions services. Not any more! We now have 
a sub-board solely devoted to ZX 
programs and other files. The SYSOP of 
the Nicolson Nightime Network has 
allowed me to set up the "ZX-TERM 
Exchange" within the framework of his 
BBS. The board is free; you WILi NOT be 
called back collect to "verify" that you 
are who you say you are when you lon 
on. It operates at 300 or 1200 
baud, 8/N/1, and can be reached from 
1800-0900 PST every night, and all day 
Sunday, at (604) 354-4666. 


Specify SIG 3 in the message base to 
read/leave ZX-related messages. All ZX 
files in the Files section have "ZX" as 
the first two letters in the name, mak- 
ing it easy to "mask" only the files 
of interest when requesting a cata- 
log. At this writing (Feb. 1988), over 
two dozen files are available. They 





include several new programs, including 
high-res (both "true" and "quasi". 
Several programs are  "shareware;" 
download them freely, but have the 
honesty to pay the author whatever you 
think his work is worth. 


Other files include support for ZX- 
TERM*80, RLE pictures, etc. Give us a 
call! General info on the ZX-TERM Ex- 
change are available by pressing (Dnfo, 
then (D. General board info is 
available by pressing (A). Pressing 

return or entering ? at any menu gives a 
list of options. 


Example of 
Run Length 
Encoded (RLE) 


Graphic from 
Nicolson 
Nightime 
Netvork. 





FORUM 


Won't You Come Home, 
Don Dailey? 


Dear Editor, I recently purchased a modified chip 
for the T/S1000 for use with the Byte Back 
interface from Don Dailey through an ad in your 
magazine. 


I've got some questions about the program, 
specifically, setting the printer format for my 
80-column printer and use of ZX PRO/FILE. I can't 
figure out the program modifications. 


I've tried reaching Don at the Montana address you 
gave in your ad, with no luck. 


If you gentlemen have another mailing address or a 
phone number for Don I would appreciate it. 


Louis Thorpe 
Atlanta, GA 


Don, ane you Listening? Please let us know whene 
you are--we hate to lose a friend. 


Incidentally, can any of our readers help, either 
to find Don on to answer the question? 


Picking Up The PCs 


Sergio Frost of San Diego writes a provocative 
letter, Rather than quote the whole letter, let me 
summarize it a bit. 


Sergio comments on our recent mentions of the PC, 
and notes that the thing that keeps him from 
converting to the Other Guys is the fact that he 
has invested heavily in Sinclair-specific hardware 
and software. 


He goes on (my apologies to Sergio for paraphrasing 

a bit here and there--blame the typos on me): "I 
think the column would have a chance (and 

readership would increase) if, for a while at 

least, the column was devoted to information on how 
to convert TS2068 hardware to IBM PC use," He hopes 
that the modifications could be non-invasive, as 

the physicians put it, so you just plug in 

components, converters, emulators, or what have 

you, 


How about it, out there? Anybody interested? Mone 
¿mportant, can anyone come up with even partial 
solutions to this problem that will probably bug 

all of us, sooner on laten? 


Fast-Load Won't 


Dear Editor, I have been using the excellent 
word-processing program, Word Sine 340 successfully 
with my ZX81 and TIMEX 2040 printer. I have, 
however, not been able to get the fast load/save 
version to work at all despite many attempts. 


Upon loading the short fast loader, all I get is a 
blank screen and thus no way to enter the GOTO 1000 
command. To check the loading I have used the Bad 


Load utility (SWN 2:2, p.4) and get consistent 
listings of the loader that do operate with GOTO 
1000. Can you or your readers assist me? 


Ken George 
Guanica, Puerto Rico 


FRED REPLIES 


I haven't personally used WS-340, 40 1 can't 
address your fast-Load problem dinecily. However, 
my experience with several different kfast-load 
noutines is that they ane highly hardwane- and 
fútmware-dependent. By "hardware" I mean tape 
necondens, by "kinmwane" I mean tape. 


Regarding handwane, some systems like to see a 
neversed playback phase in order to work property. 
Make up a "backwands" Loading cable; &e., the 

"Zip" ot one goes to the "gnound" on the other, and 


SyncWare News 
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vice versa. Try using this to Load your previously 
fast-saved programs/data. Be sure to disconnect the 
MIC (SAVE) cable! (Incidentally, this is always 
good practice.) 


Regarding firmware, try different brands of tape. 
I've found that TDK chrome tapes work best for me. 
(Don't worry about the fact that your recorder 
desn't have a chrome setting. We'ne not concerned 
with hi-fi hene, only that we have a clean, bright 
signal.) 


I$ still no go, contact Peter McMullin, 2340 Queen 
St. East, Toronto Ontario M4E 169 gon his sage 
advice. 


More On The PC 


Dear Editor, 


1. Your module/checklist left out an essential 

item, the BIOS...and while I was trying to decide 
which 386 machine to buy, I learned that there are 
illegal ones and some very poor ones on the market. 
I wound up with Phoenix BIOS-386 and it works well 
on my ALR 386. 


2. Your statement that DOS (MS or PC) automatically 
contains BASIC is wrong. It can be included as a 
"no-cost" extra, but unless the specs list BASIC, 

it won't be there! Microsoft's GW BASIC is 

identical to IBM's "Advanced BASIC" (usually called 
BASIC A) with the same release number, 


3. Get the highest release number of DOS and BASIC 
that your machine will handle. 


4. And you should have mentioned the 8087 
(80287-80387) when you were discussing TURBO PCs. 


Dave English 
Orange, CA 


P.S. Oh yes! I had a heck of a lot more parts 
plugged and wired into my TS1000 than I need on my 
ALR. 


REPLY (of sorta) 


We'll pass this one along without com ment--probably 
Dave knows a Lot more on the subject than any of us 
here at SUN. One thing that I (Basil) will heartily 
endo^se, though: whenever you buy any software, 

it's wise to get the latest possible version, 

unless you have a compelling reason not to. Ön, as 

a piece of onal graffiti 1 once heard has it: never 
buy version 1 of anything. 


Fury, No Sound 


Dear Editor, I refer to Mr. Lou Dooly's letter in 
Vol. 5 #1 with reference to T. (J) G. Morley's 
letter about the screen tearing on the Sears 
TV/monitor. 


My monitor now works perfectly. First, a TV repair 
man suggested that the sync on the composite output 
might be too strong, so I inserted a 10K pot in 
series with the composite output on the 2068. The 
TV cleared up at about 100 ohms. The solution was a 
100 ohm 1W resistor in series in the composite 

cable, 


I do not like using resistor circuits so instead of 
the simple circuit in the 2068 service manual I 





used a CMOS inverter and buffer circuit on the RGB 
output. No good. Finally, after much fiddling, I 
went to a transistor inverter and straight 
connections to RGB. What a beautiful sight! The 
color was a little different from the composite 
color, but very acceptable. 


My only problem now is no sound. Why Sears (or 
anyone for that matter) would put out an RGB | 
monitor without sound capabilities is beyond me, 


It appears from the circuit diagram that the audio ? 
is disconnected when you switch from composite to 
RGB. 


I would appreciate hearing what some others have 
done with the audio, short of a separate audio 
amplifier, 


T. G. Morley 
T or C, New Mexico 


FRED REPLIES 


The sound quality of the TS2068 speaker does Leave 
a lot to be desined, as does it audio driver 
circuit. Furthermore, there is no way to vary the 
volume. Many composite monitors have a built-in 
amplifier and speaker, but as you pointed out, 
manufacturers of RGB monitors generally don't 
Anckude this for thein own obscure reasons. 


You do need some sort of external amplifier/speaker 
combo. Radio Shack has such a thing at reasonable 
cost [around $15). 


Do you have an old portable radio kicking around? 
16 50, My running the sound to the two outside 


terminals of the volume control, and tune the radio 
to a quiet spot on the dial. DO NOT use "AC-DC" 
type nadios (e.g. the old "all-America 5-tube" 

sets, on the so-called "tnansformenkess" sets) for 
this! 


Another possibility is an old el-cheapo stereo with 
"Line in" on "phono" input. 


Finally, you can cab your tape recorder into 
service. Run the sound into the MIC jack through an 
attenuator cable (from Radio Shack). Connect a 
speaker, in series with a 100-ohm rheostat 
(potentiometer) to the EAR jack. Put in a cassette 
with the tape cut ot nemoved to allow enabling 
RECORD mode. Vota! Plenty of volume. 


(Editor's note): Don't take that warming about 
"4ranskonmenless" nadios tightly. Tf you make a 

dinect ground connection to the wrong side of the 

tine, you kun the nisk of blowing fuses, radio, and | 
computer, on--literally--ot killing yourself. , 
Whichever comes first. | 


By the way, there's a delightful geography Lesson | 
in this letter. There really is a T on C (Truth ou T 
Consequences) in New Mexico, on the Rio Grande, 

night between Elephant Butte and Caballo Resenvoin. 

ZIP code $7901. What's the story behind the name, 

T.G.? 


Columbus Day 


One of my first opportunities as your Editor was to 
attend a mass meeting of Users' Groups in Columbus, 
Ohio, This was on January 30, a day between (well, 
sort of) snowstorms. Including your Publisher and 
your Editor, there were 18 TS enthusiasts there, 








coming from places as diverse as Columbus (of 
course), several Indiana cities, the tvo 

Louisvilles (OH and KY) and a number of locations 
in western Pennsylvania. 


Kudos to Mowgli Assor, of Columbus, who arranged 
the meeting. I didn't get the whole story, but it 
appears that Mowgli was Shanghaied into the job, as 
the result of some "innocent" eavesdropping he was 
doing at the time. 


Whatever, he did a darned good job of it. 


Mowgli, who got his name from the Kipling stories, 
pronounces the MOW to rhyme with "grow", the gli 
just like "glee". Accent on the MOW. Like the 
actress telling the director, "Land sake, ah'm as 
happy as a clam already. You cain't possibly expect 
me to show any mo" glee," 


Sorry about that, Mowgli. I never was any good at 
dialect. (He tells us that he has a brother called 
Tigger, by the way.) 


But whatever, Mowgli deserves high praise, both for 
organizing the meeting and for keeping it running 
smoothly. As you might guess, running a meeting of 
TS nuts is something like driving a herd of eels. 


We talked about computer shows, and decided that 
there would probably not be a mid-West TS show this 
year. One of the reasons for the decision was that, 
with the Orlando show coming up, we didn't want to 
overburden our exhibitors. 


HOW ABOUT THAT, you vendors of TS equipment, 
peripherals, software, or what-have-you? You know 
better than we do how often you'd like to go to 
shows. And what's your point of view on the whole 
subject? Maybe one of you would like to do a 
full-length article on the vendor's-eye view of 
exhibitions, How do you feel about them? How can 
the organizers best help you? What do you want to 
know from the public? How often do you want to 
attend shows? How can SyncWare News help you to 
communicate with your customers? 


We'll pay you our regular authors' rates for a good 
article. 


Me, I love them. (The shows, that is.) Not only are 
they fun, but they help sales. And it has long been 
my motto that an honest business deal brings 
benefit to all parties concerned. 


What's In A Name? 


We also talked abut the term COMPUTERFEST. Gary 
Ganger pointed out that the term is owned by the 
Dayton Microcomputer Association, Inc. Owned and 
protected by copyright. Gary went on to announce 
that the Association would let other groups use the 
term occasionally. He did not say how often, or on 
what terms, but I would expect that foremost among 
the conditions of use would be the assurance that 
no-one would bring discredit to the name. I know 
that this thought is uppermost in the mind of 
Harvey Phillips, my tuba teacher, who owns the term 
OCTUBAFEST. 


Gary also claimed that the copyright covered all 
permutations of the name--capitals and lower ease, 
hyphens, asterisks, whatever, Now, my knowledge of 
law comes from reading Perry Mason instead of 
Blackstone, and I don't know how close to a generic 
term you can come and still claim a valid 
copyright. But I've always been a strong supporter 


of ethics and courtesy. Let's not pirate the name. 
If the DMA is willing to give permission to use the 
name, let's ask for permission, and give credit 
when it's granted. If they're not willing to give 
that permission, send me a prospectus of the event, 
and I'll suggest between 3 and 100 names that you 
could use. Although you could probably think of a 
better name yourself, 


(I don't think that this is what Shakespeare had in 
mind when he said "who steals my good name steals 
everything", but I couldn't resist setting up the 

pun "who steals my purse steals cash".) 


If you do want to ask permission to use the term 
COMPUTERFEST, get in touch with 


Dayton Microcomputer Association, Inc. 
c/o Dayton Museum of Natural History 
2629 Ridge Avenue 

Dayton, OH 45414-5499 


Hints to Users' Groups 


Several valuable suggestions for UGs came out of 
the Columbus meeting. Which proves the value of UGs 
in general and, even more so, the value of 

inter-group meetings. Among the suggestions were: 


? Use TS computers to teach computing. This is not 
a new concept--many of us have preached and 
practiced this precept for years--but it can never 
be repeated often enough. 


> Exchange video tapes of UG meetings. This could 
be especially useful in cases where formal 
presentations are made. 


> Get local newspapers to publish features on 
people using TS computers in the "real world". 


> Distribute free copies of your newsletters to 
publie libraries. (Actually, there's no reason to 
limit this to public libraries, Think of 

universities, schools, companies.) The marginal 

cost of a copy is but pennies, and who knows when 
you'll find a prospective new member? 


SVVN And Users' Groups 


This is a drum that we are going to beat loud and 
long. We want to help UGs to survive and prosper. 
Anyone who has suggestions as to how we can do 

this, please let us know. We've made a couple of 

offers already, Here are a couple more, that grew 
out of the Columbus meeting. 


We'll be glad to publish eatalogs of public domain 
programs available from UGs. Please make sure that 
the programs you offer really are public domain--we 
wil take no responsibility other than publishing 

in good faith information that we assume was 
offered to us in equally good faith. Tell us what 
programs you have (including a short description, 
even if you think that every schoolboy should know 
already), in what format you can furnish them, and 
on what terms you offer them, including your charge 
for duplicating, packing, and shipping. AND, of 
course, the name and address of a person to 
contact. 


We offer another exchange of information: we'll 
give you a list of our subscribers within a 
reasonable radius of your center of operations (it 
would help if you could give us ZIP code numbers) 


in return for a list of your members. We expect you 
to treat this offer with respect, and not to use 

our lists for any other purpose than soliciting 
membership. We'll make a similar commitment to hold 
your list in confidence. 


A Word To Authors 


Here are a few tips for any of you who ever wanted 
to get your name (and your thoughts) before the 
public. 


1, We want you to write. Without authors, we 
wouldn't have a magazine. Without the interaction 
of ideas, we wouldn't have a civilization. 


2. Write what interests you. Most of the programs I 
write are in response to my own needs, I suppose 
it's possible for someone to think "Well, today I'm 
going to sit down and invent the wheel", as a sort 
of abstract exercise. But most of us invent our 
wheels to fill a need for easier transportation. 


3. Write in our format. Your own words, sure, but 
our format. Know now that an editor is a lazy 
creature, He gives first preference to the article 
that requires the least effort on his part. If all 

he has to do is to delete three words (he's always 
got to monkey with the script a little bit, to 
satisfy his own ego), he's more likely to accept it 
than if he has to spend hours reworking it. This is 
true not only of SWN but also in the case of media 
releases, poetry, and the Great American Novel. 


4. A corollary to 3: sometimes an idea, though 
badly expressed, is so good that we can't turn it 
down--an offering we can't refuse, as it were. If 
we have to put in a lot of editorial work on it, we 
scale down our payment accordingly. Even worse, 
there is a chance that our corrections of form will 
affect the substance of the article, and your great 
idea may get buried under our "corrections", 


5. We like our old friends, but we'd like to hear 
from new authors, too. I don't remember ever having 
seen an article by a woman, Why not? Why not from 
teenagers? 


6. We like to have your work in MEMOTEXT or 
MSCRIPT. We're equipped to handle them. But I've 
been sending in my stuff for years on a rinky-dink 
word processor I wrote myself. The trick, however, 
is that I've always accompanied each submission 
with a copy of the word-processor program, and 
complete but SIMPLE instructions on how to use it. 


7. Your contribution doesn't have to be earth- 
shaking, or abstruse, or incomprehensible. We don't 
expect you all to be Bents or Nachbaurs. What your 


work must be is INTERESTING. My own interest is 
usually piqued most by articles that invite 
modification to suit other applications, The sort 

of thing that makes me think "Hey! That's great, 
but what if...?" Or "if I just...then I could make 
this program..."Or, as the raconteur always begins, 
"That reminds me of..." 


8. Therefore, if you see ways in which something we 
publish can be improved, send them in. It needn't 
be a full-blown tutorial--just a sentence or two. 

Be tactful, though--as the aphorist says, always 


use sweet words, because you never know when you 
might have to eat them, Bu” be especially careful 
in this case, because we're going to send your 
comments to the author before we publish them, and 


wil accompany them with the author's rebuttal, if 
any. . 


9. If your program is interesting enough, it 

doesn't even have to work. But BE HONEST. If it 
doesn't work, say so, and tell us why you expected 
it would work, and what you've done to try to get 
it going. There's the ultimate in challenge. But 

only for short programs, please. Don't expect our 
readers to wade through pages and pages in order to 
find one misplaced comma, Isolate the problem, and 
send us only that part. - 


10. We would even consider publishing non-programs. 
Or perhaps I should say pre-programs, Tom Woods 
once told me that a computer is a solution looking 
for problems, Maybe you have the problem. Send us a 
set of specifications of what you want your 

computer to do, what constraints there are on the 
solution, and any suggestions you have, 


Author Guideline 


RULES FOR AUTHORS 


We prefer articles in ready-to-go form. MSCRIPT or 
MEMOTEXT, or your own word processor IF you include 
the processor program. (We don't expect you to 

violate copyright laws by making an unauthorized 

copy of a proprietary word-processor program.) 


No material will be returned to you unless you say 
you want it back AND send us enough money to pay 
for postage and for new wrapping material, if 
needed. Checks or money orders payable in US 


currency, please--no cash or subway tokens, 


If you send material on disc, it should be 
formatted for AERCO interface. 


Articles should be submitted in the typographical 
style you see in SWN: 52 characters per line, 
capitals and lower case letters, no special 
symbols, Single spaced lines, one blank line 
between paragraphs. Do not indent paragraphs. Use 
only a single space betwen sentences. 


Start your description of each program with a list 
of what equipment you need: for instance, 
ZX81/TS1000 or TS2068? Extra RAMPACK? How big? 
Joystick? What else? This information should also 
appear on the cassette, or on the disc envelope. 
Your description should also tell us what the 
program does, of course. 


.— — 


Your name and address, and the title of the 
program, should appear on the cassette or disc 
envelope, and should also appear in a REM statement 
at the top of the program. We'll DELETE your 
address before we publish. But please take this 
requirement VERY seriously. It doesn't do either 

you or us any good if we can't tell whose program 
we're working with. 


If your program is based on someone else's work, be 
fair, and acknowledge that fact. Credit where 

credit is due, Also, that knowledge may help our 
readers to get more out of your article. 


POUNDING BRASS AND 
BLINKING SYMBOLS 


You might at some time have read a story vvritten in 


round-robin technique. A story that is started by 
one author, and finished by another, with perhaps 
one or more other authors contributing "middle" 

sections, And all working independently. 


We have something like that this month--a trilogy 
of programs on related subjects, but done by three 
separate authors, each working without reference to 
either of the other programs, 


As you know, there are three methods of signalling 
in widespread use: audible Morse, blinker Morse, 
and two-handed semaphore. We also used to use a 
single-flag wig-wag when I was in the Boy Scouts, 
but that system is much slower than semaphore, its 
direct competitor. 


Of course, there are also more exotic Systems, like 
radio-teletype and telepathy; and less complicated 
systems, like megaphones, sign language, talking 
drums, and visually outlining the letters of a 
message. But let's pretend that there aren't. 


After spending several years as supervisor of the 
radio gang in the US Navy during the 1940's 
(notice, I said "supervisor", which means that I 
didn't really have to learn the code myself), I 
naturally went audio for my SWN contest entry. 
Besides, I'm a lover of music--remember? 


Sheldon Gilbert, a sailing enthusiast, chose 
semaphore. This system requires the barest minimum 
of space and weight allowance for 
equipment--actually, you can send semaphore quite 
satisfactorily with your bare hands--so it is 
understandably popular on small boats. 


Peter Wentworth, with more recent experience in the 
Navy, took the blinker approach. Blinker has one 
distinct advantage over semaphore--it can be used 
in total darkness. 


NOTE: I suppose that I should apologize for the 
titles I gave these articles, but you can't say you 
weren't warned, 








TS2068, BASIC 
Contest entry 
Basil Wentworth 


. . .And Under the Hood 


This trainer incorporates the following features: 
-Pitch of BEEP tone: adjustable. 


-Speed: adjustable over the range of 2-15 words per 
minute. 


-Display: optional, You can display each character 
at the time that it is "transmitted", or you can 
wait and display the entire text after the exercise 
is finished. 


-Operating modes: 





SER Wee MEA EE mas KS üş 


2. Prepared text. A text, pre-typed by the 
instructor, is "transmitted" at the selected 
speed. 


3. Random characters, The computer generates its 
own text of random characters, in 5-character 
"words". Once this mode is turned on, it continues 
inexorably (might one say remorselessly?) until the 
BREAK key is pressed. However, if you want to use 
it for background music, be sure that you operate 
in the non-display mode, or the program will stop 
when the screen is full, 


The program will not be seriously damaged by RUN or 
CLEAR. However, the speed will have to be reset 
after either of those commands--so will the BEEP 
frequency, unless you have exercised the option of 
setting it permanently via line 40. Also, RUN or 
CLEAR will lose any text that you may have been 
saving to display at the end of the exercise, 


Operation 


1. Letter-by-letter. The keyboard acts like a 
typevriter, BEEPing out the Morse equivalent each When the program is LOADed, you are given a sample 
time a key is pressed. This mode is most useful for of the BEEP tone. If you like it, press "ENTER". If 
beginners, it is not to your taste, you can adjust it a 


semi-tone at a time by "h" or "1" (for "high" and 
"low", of course), or 4 semi-tones at a time by 
using the corresponding capital letters, Once you 
get a tone that you like, you can perpetuate this 
preference by changing line 40, which the computer 
very kindly LISTs for that very purpose. 


Then GO TO 1. 


The menu, which can be recalled at any time by 
BREAK:GO TO 1, offers you the options of SAVEing 
the program, PRINTing the text that was used in the 
exercise just finished, or CONTINUEing with the 
drill. 


If you choose the option to CONTINUE, you are given 
the choice of modes of operation described above. 


Z$, listed at the top of the program, includes all 
of the characters that the trainer can cope with. 
This string is used during the generation of random 
characters, to make sure that the random generator 
doesn't choose symbols that the program isn't set 
up to handle. If you want to add other 
characters--or, for that matter, to delete some of 
those that are included--you must make the 
appropriate adjustment in Z$ and in the line 
bearing the number (500+c), where c is the CODE of 
the character you are adding or deleting. 


One WARNING: if you delete any lines in the 500-755 
area, be sure that you replace them by a RETURN 
instruction, Similarly, any lines added should 
incorporate a RETURN. 


1 OMNES: E T 
20 LET Z$-z",-.QliZ34567887hBBED 
EFGHIUKLHNOPƏRSTUUUXYZ" 
30 POKE 2235580: ERL ouer cas 
e letters 
40 LET A S 
Bü LET w= 
Sü PRINT rc 
8 PRINT “u- : DEE ERIFY 


loONEEEN 

110 PAUSE 0 

120 LET C=CODE INKEY$ 
130 LET ok ={(c=89)4+(c=121) 
140 RETURN 


220 GO SUB (S@@+CODE L$) 

230 IF d$£-'"" THEN RETURN 

250 FOR d-1 TO LEN s 

260 IF d$£íd)«»"." AND d$ldl<>"- 
" THEN RETURN 

270 IF d$£íd)z"." THEN BEEP .@5, 


freq 

280 IF d$id)="-" THEN BEEP .15, 
re 

298 NEXT d 

300 RETURN 

53 

543 RETURN 

544 LET d$="--..-->,": RETURN 
545 LET d$="-...->-": RETURN 
546 LET d$=".-.-.->.": RETURN 
547 LET d$="-..-./": RETURN 
548 LET d$="----- a": RETURN 
549 LET d$-".----1": RETURN 
550 LET d$-"..---2": RETURN 
551 LET d$-"...--3“: RETURN 
552 LET d$£z"....-4": RETURN 
553 LET d$=".....5": RETURN 
554 LET d$£-z"-....5": RETURN 
555 LET d$-"--,..7“: RETURN 
556 LET d$£-"---..8": RETURN 
557 LET d$="----.9": RETURN 
562 RETURN 

563 LET d$-"..--..?": RETURN 
564 RETURN 

565 LET d$=".-A": RETURN 

566 LET d$-"-,..B": RETURN 
567 LET d$£z"-.-.C": RETURN 
568 LET d$-"-..D": RETURN 
569 LET d$=".E": RETURN 

570 LET d$-"..-.F": RETURN 
571 LET d$='--.G”: RETURN 
572 LET d$-"....H": RETURN 
573 LET d$=".. I": RETURN 


R 
575 LET d$-"-.-K' RETURN 
576 LET d#=".-..L": RETURN 
577 LET d$z'—--M': RETURN 
578 LET d$="-.N" RETURN 
579 LET d$="---0": RETURN 
588 LET d$=".--.F": RETURN 
581 LET d$="--.-8": RETURN 
582 LET d$-".-.R": RETURN 
583 LET d$£2"...5": RETURN 
584 LET d$="-T" RETURN 
585 LET dğ-"..-i”: RETURN 
586 LET d$2"...-U": RETURN 
587 LET d$£-".--U": RETURN 
588 LET d£z"-..-X": RETURN 
589 LET d$="-.--Y": RETURN 
598 LET dğ$-z"--..Z": RETURN 
656 RETURN , 
oOOONEERBI enu 
10109 CLS 
1020 PRINT ^" PRESS TO “ 


Continue uit 


c 
1040 PRINT '" P Print text" 
s SRUE Program 


1060 PRINT “““You can return to 
menu at anu” 
1070 PRINT “time by BREAK:c0 TÜ 


1080 PRINT ““"To reset the frequ 
encu of the" 
1090 PRINT "audio tone, BRERK:GO 


2 
1200 GÜ SUB 100 
1210 IF CES QUE c=115 THEN GO Tü 


900: UE 
1220 IF c=8@ OR c=112 THEN CLS 
R INT 


PRINT m$: STOP 
1298 IF c<>67 AND c<>99 THEN GÜ 


TO 1200: invalid entry 
158 PUT 


1510 CLS 

1520 PRINT e is FOR “ 
1530 PRINT “”” Letter-by- 
letter input" 

1549 PRINT “ (typewri 
teri“ 

1550 PRINT ““ t Text dritt” 
1560 PRINT '" f Random Lett 
er dritt” 


1570 LET ra=2 

1600 GO SUB 100 

1610 POKE 23653,8:NEEMHCapitats 
1620 IF c=76 OR c=108 THEN GÜ TO 
2008: EE ypewriter 

1630 IF ER OR c=116 THEN GÜ TÜ 


2508: xt 

1640 IF qw OR c=114 THEN Go Tü 
300 

1650 GO TO 1600: EIN: nvatid ent 
ry 

1999 STOP 
2200 
2010 CLS 


2024 POKE 23659,3: Wc api (La L 
2030 PRINT "Enter text, letter b 


2040 LET ms="" 
2459 GÜ SUB 100 
2860 LET t#=CHRS C 
20709 GÜ SUB 288 
2080 PRINT ($, 
2499 LET m$-ms$4i*$ 
21088 cO TO — 


tupeuriter 





2518 

2520 Gö “sun 5000: display? 
2539 cO SUB 3080: mes PEED 
2599 POKE 23658,8 

2610 CLs 


2620 INPUT "Input text ";ms 
2630 PRINT m$ 

2648 GO SUB 308 

2659 IF NOT ok THEN GO TO 26518 


CLS 

2670 PRINT "Press ""ENTER"" to s 
tart dritt" 

2688 cO SUB 100 

2698 GÜ TO 4000 

300086585! andom CHR$' 

3010 LET ra-i 

3020 CLS 

3030 GO SUB 5000: 
3040 GO SUB 3000: 
3050 CLS 

3060 PRINT ““Press ""ENTER"" to 
start dritt" 

3090 GÜ SUB 100 

3100 POKE 23658,8 





S 
3140 LET n=INT (414RND} +1 
3160 LET ($-z$in) 


3313 LPS 
3218 
3240 IF disp THEN PRINT L$; 
3258 PAUSE pause 

NEXT F 


3270 PRINT " "; . 

3288 LET m$-m$-4 

3298 PAUSE 23pause 

3300 cO TO 3130 

3999 STOP 

400ONEEENRPRERD text 

4010 CLS : PRINT 

4020 FOR m=1 TO LEN m$ 

4030 LET l$=m$(m) 

1353 Soule’ paya 

4050 pau 

4060 IF disp THEN PRINT l; 
NEXT 


m 
4090 IF ra THEN RETURN 
4999 STOP 
SOOCONEENEIEG 1 Sp L au 7 
5010 PRINT ^"Do you want each te 
tter dis-" 
5020 PRINT “played as it is ""tr 
ansmitted""?" 
50309 PRINT `" 4 


age 

88128 CLS 
8828 PRINT ““How many words per 
minute do” 

8838 PRINT “you want (2-15) ?" 
8040 INPUT w 

8858 IF U<2 OR U»15 THEN GO TO 8 


8080 LET pause=-1+664LN (15, (w-1 


9oOONEENINESRUE 

9019 CLEAR 

9020 CLS : SAVE "code" LINE 9200 
9030 BEEP .3,16: BEEP 1.16 

9040, PRINT ““re-play tape to UER 


9050 UERIFY "code" 
9868 PRINT AT 10,10; FLASH 1;" y 
ERIFY OK " 

zə BEEP 23,12: BEEP 1,12 
Ewa sodi une BEEP 

9220 POKE 236538,0: Ei ower cas 
e letters 

9230 PRINT ““"First, tune the au 
dio tone to" 

9240 PRINT “suit your taste." 
9250 PRINT ““The present pitch i 
s as fotiows:” 

9260 PRINT '"Press ““ENTER"" if 


9270 PRINT “““Press ""h"" for hi 
gher pitch;" 

9280 PRINT """Li"" for Louer (""H 
.... and 755 for” 

9290 PRINT " much Louer)" 

93800 LET freq=16 


9330 IF c-13 THEN GO TO 9500 
9340 LET freqz=freq+(c=104) -(c=ia 
8) +44 1((c=72)-(c=76)) 

9350 GO TO 9312 

9539 CLS 

9540 PRINT '"The frequency index 
of the tone" 

9550 PRINT "is nou set at "freq 
;,". YOU may" 

9560 PRINT “wish to record this 

setting in" 

9570 PRINT "line 40." 

9588 PRINT ““Then GO TO 1 to con 
tinue.” 

9599 PRINT 

9600 LIST 40 


Fig. 1 LISTing for SOUND program 


TYDXBYTS 


USE THE BEEPER 


The next time you have a program that takes a long 
time to run (or to SAVE/LOAD), save your patience 
by inserting a BEEP message to catch your attention 
when the job is finished. You can program the BEEP 
for a single note, a TA-DA!, or even for 
Beethoven's Fifth. Then you can enjoy youf coffee, 
or work on your notes, or just doze off, and the 
computer will gently remind you when it wants your 
attention again. 


With the ZX81/TS1000, without BEEP capability, you 
can get a similar effect if you leave your printer 
connected and ready to run. Just program LPRINT nn 
for the strategic moment. Your printer will give a 
discreet hiccup at the proper time. 


If you really want to use Beethoven's Fifth, here's 
the program: 


10 FOR F-1 TO 3 
20 BEEP .2,7 
30 NEXT F 
40 BEEP 1,3 


If you prefer the Firebird, that's a little more 
complicated. 





OLIGER 2068 EXPANSION BOARD PRECAUTION 
from the desk of Kent Cook 


Run a strip of insulating material (plastic tape, 

for instance) along the exposed card-edge connector 
leads soldered to the top of the expansion board, My 
kitten pulled a loose power supply cord across my 
system and the coaxial plug contacted the bus, 
frying a 4416 in the TS2068. I lost a week in 
trouble-shooting and repairs. The kitten lost one of 
his 9 lives, 


PC8300 VIDEO FIX 
From Fred Nachbaur 


One of the most common complaints with the PC8300 
is that the characters tend to have a "splayed" 

look, with horizontal lines Sticking out to the 

right. No, it's not because the Chinese designers 
didn't know how the characters are shaped. It's 
simply a matter of overdrive (video level or 
"contrast" too high). 


The fix is remarkably simple. Connect a resistor (I 
used 4.7K) between pin 35 and pin 40 of the custom 
chip. This is the chip nearest the modulator. Pin 
40 is the pin furthest to the right in the front 
TOW, as viewed from the front of the machine. Pin 
35 is five pins to the left of pin 40. If you are 
experienced at soldering, simply solder the 

resistor directly to the "shoulders" of the pins. 

If not, you'd be better off removing the chip, and 
connecting the resistor to the socket on the 
underside of the board. 


Lower values (e.g. 3.9K, 3.3K) will give more 
attenuation. 


e Chav brood ® E again 


PIDE Dl 


TS 2068, BASIC 
Sheldon S. Gilbert 


A Learning Tool 


My 2068 serves me as a useful tool to cope with the 
many demands of semi-retirement. I use it 
frequently to help me acquire new knowlege and 
skills, an activity that to me is a prime reason 

and delight of retirement. 


As a retiree I get to spend more time on the water 
sailing than I did in the past and have found it 
desirable to hone some old nautical skills as well 

as to learn some new ones, In order to accomplish 
this I find it useful to enlist my 2068 to serve as 
a partner in learning even though quite frequently 
no program seems to exist for the two of us to 
use, 


For this reason I wrote several programs that have 
helped me review and learn nautical signaling 
techniques. One of these programs, designed to 
provide drill in receiving semaphore signals, is 
given in the listing. 


The program is only minimally interactive because I 
find that too much interactivity slows things down 
and defeats the purpose of the program in providing 
drill. In effect the computer serves as a study 
partner who if it were a real person would be too 
far off to talk to except by signalling. 


Semaphore signaling, you may remember from your 
scouting days, is a system of visual communication 
whereby information is transmitted by the position 
of the sender's two hands normally holding a pair 
of hand flags for greater visibility. It is very 
useful for communicating across open spaces when 
the radio has conked out. 


How It Works 


My program displays randomly selected semaphore 
signals in the form of two flags shown on the 

screen, After a suitable time during which the user 
may identify the letter represented by the signal 

the letter will appear on the screen, If in 
"AUTOMATIC RUN" mode the computer will repeat the 
proeess until approximately fifty signals with 

their corresponding letters have been shown, The 

user, particularly if he is early in the learning 

process or reviewing after a long vacation from 
semaphore, may prefer the "MANUAL CONTROL" mode, If 
SO, the computer will ask if he wishes to see the 
signal for another letter after each signal has 

been shown and identified. 


ntere 


The program begins with the display of a menu 
permitting the user to choose either of the two 
modes, to seek instructions, or to stop the 
program. 


The selection of either of the two display modes 
eventually leads back to line 10 where the routine 
to select flag positions begins. Each of the two 
flags may appear in one of eight possible 
positions, The position of the first flag is 
determined by Line 20 and that of the second flag 
by Line 30. Line 40 filters out duplicates and Line 
45 eliminates the one set of flag positions that 
does not represent a letter. Line 50 sends the 
computer to the subroutine for drawing the border 
around the screen. It then alternates between 
setting the flag centers and referring the program 
to the appropriate flag drawing subroutine position 
until both flags are drawn. 
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Fig.z Semaphore Dbii:piau 


Up to this point the computer is ignorant of the 
meaning of the signal display it shows. It learns 
this by using Lines 7000, 7010, 7020 and 7030 to 
check out some simple arithmetical relationships of 
the of the numbers assigned to the flag positions. 
Then it compares its finding to the flag positions 
that have been chosen by Lines 20 and 30 and prints 
the letter equivalent. Logic operators were used to 
avoid clutter but IF...THEN statements would serve. 
(Editor's NOTE: lines 7000 to 7030 are well worth 
study by those who are not familiar with this 
technique.) 


Lines 8000 to 8514 create the UDGs necessary for 
the flag centers. The rest of the program is 
straightforward. 


CONTINUED ON PAGE 15 
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PC-8300 Schematic courtesy of: 


SLOT ELECTRONICS MFG. 
5920 Kartner Road 
Richmond, BC V6V 1R9 
Canada 


PC 8300 .PARTS LIST 


IC's Ul C4005 ULA 

U2 Z 80 CPU 

U3 74LS05 Inverter 

U4 8440 ROM 

U5 2016 RAM 

U6 - U9 Not Used (2114) 
REG's VRI 7805 Voltage Reg (5v) 

Q1 D227 Transistor Reg. 
ZENERS EL Zener/Diode Combo (9.2v) 
DIODE D1 - D3 1N4148 
RESISTORS RI - R8 lOK 

R9 - R16 470 

R17 « R21 4700 

R22 10K 

R23 680 

R24 820 

R25 4700 

R26 220K 

R27 - R29 680 

R30 1K 

R31 470K 

R32 1K 

R33 220 
CAPACITORS CI 100 MFD 16v 

Ch e La 47 MFD l6v 

C4 .l Ceramic Disk 

CS 47 PF Disk 

C6 - C9 -l Ceramic Disk 

C10 200 PF Disk 

C11 - C14 -l Ceramic Disk 

C15 .047 Ceramic Disk 

C16 47 PF Disk 

CIT .01 Ceramic Disk 
TRANSISTORS 02. D227 Audio Amp 

Q3 1402C Switching Amp 

Q4 1402C Video Amp 


vw 


O) 
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Ohl Those funny little numbers dancing in the upper 
left hand corner? 1 put those in to check on hov 
often the 2068 discarded a duplicate or useless 

flag position. 1 sort of like them but if you 

don't feel the same way just choose the fourth 
option on the menu, LIST 7045, type "n" to stop the 
scroll and delete the "PRINT i". 


I refrained from translating any of this all BASIC 
program into machine code as it appeared to me 
nothing would be gained by increasing the speed of 
the program and memory is no problem. On the other 
hand, there is occasionally an illusion of movement 

at BASIC speed which I felt added to the program's 
charm. 


SEEERNME menu,instructions à in 


itialize 
6 BORDER 4: PHPER 6: CLS : SO 
SUB Gat 
7 GO TO seda 
ın CL8 : Gü SUB 3009: FOR i-i 
Tü 58: CLs : GO SUB 2594: 
15NEEEE select flag position 


Bü LET b=INT :RNDxB8-«1! 
30 LET c=INT (AND+3+I: 
33 eliminate non-iet 
4@ IF b=c THEN GÜ TO 7042 
45 IF bxc-48 THEN GO TO 7 
4A7EEEENE piot start far fi 
took far Flags 
Bü GÜ SUB 23788: TE ps: 
O SUB b522: PLOT 108, Gü SUB 
c:58u 
lizMGEHM give time to answe 
en ga to answer rautine 
114 PAUSE 184: GÜ SUB 5298 
1l16MGERM implement auto-run or 
manuat 
117 PAUSE 100: RUN 
118 IF Z-2 THEN GO TO 7518 
41930 draw flags & print cen 
ters 
QiOONEEEB up fiag 
sün DRAH 4,489 
sin DRAW Ba@7a,3@+a: DRAH -sü-a, 
387a: DRAW -30/a,-30./a: DRAH Bev 


a, -307a 
s INK 2: PRINT AT 3,12;" “ESE 
NK 


sü RETURN 

ieooNEEEME down flag 

1093 DRAW W, ia 

1010 DRAH -30/a,-30./a: DRAH 34sa 
,-30/a: DRAW 34-a4,30/a: DRAH -32 
/a,387a 

1020 INK 2: PRINT AT 18,12; "A" 
i822 PRINT AT 18, 12:"B": INK 4 


1500MGEHM right flag 

1510 DRA a: DRAG @,-38@: DRAW 
-30,0: DRAW 0,30 

1528 INK 2: PRINT AT 13,19;"0 


INK Q 

1559 RETURN 
200 Lert 3 

2019 DRAH -70,0: DRAN @,-38: DRA 
U 30,0: BRAY 0,30 

e INK 2: PRINT HT 13,5;"C": I 
2@48 RETURN 

2SOONEEENE tower lert flag 

2520 DRAU -7@+a,-7Bra: DRAH Bava 
,-3@7a: DRAN 3@7a,38/a: BRAY -32 


sa, 307a 

2530 INK 2: PRINT AT 17,8; "FG": 
INK @ 

2550 RETURN 

22 Lower right Flag 


30008 

30108 PLOT 109,825 

30209 DRAW 70/a,-vYü/a: DRRU -307a 
.-30/a: DRRU -30/a,30/a: BRAY 30 
/a3.30/a 

3030 INK 2: PRINT AT 17,15; "FG": 
INK @ 

Basa RETURN 

3SU00805EZRN upper right flag 

S DRAH 70/7 mit a: DRAH 230/8.- 

S@/a: DRAH -34-a,-34sa: DRAH -34 
sa ,3d.,a 

3530 INK 2: PRINT AT 7,18; H" 
3535 PRINT AT 8,18;"B": INK dà 
3559 RETURN 

4Q000HEERMH upper tert flag 

“düzü DRAH -78. — ^a: DRAH -3873 
,-a@7a: DRAU 30/ -30”a: F 
sa, 3073 

düdü INK 2: .. AT 7,55 B 
4235 PRINT HT 3, "B": INK 2 


¿asa RETURN 

OOO instructions 

S@i@ CLS : PRINT TAB 10, “INSTRUC 
TIONS" 

SAZA PRINT "This program is desi 
gned to helpyou learn to read se 
maphore code””” 

5430 PRINT “You have tuo choices 
:IIThE mach-ine wilt chow you a 
ietter,give you a short time ta 
decide What it is,then show vou 
the answer & go an to another i 
etter.After about sü letters it 
ri P give you a chance ta cont 


5035” PRINT "change to Choice 2,0 
r STOP." 

5949 PRINT “ZiYcu may have the P 
rogram shou you a letter, give y 

cu a short time to decide uhat 
it is and wait for you to ask 
for another Letter.””“ 

5045 PRINT "Press any key to con 
tinue.": PAUSE Y 

Sesa IF INKEYS<>" " THEN GO TÜ 6 

SAPO menu to choose auto-ru 


n 

6@@5 CLS : GO 5 

58128 PRINT AT Z, 
Z 


LL. 

6828 PRINT AT 
S830 P PRINT AT i8,56;"1) AUTOMATI 
040 PRINT AT 12,6:“2) MANUAL C 
6042 PRINT AT 14,6;"3) SEE INST 


6044 PRINT AT 16,6;"41 STOP PRO 
GRAN" 

6059 INPUT Z 

esoomERBEN puts menu choice into 
effect 

6685 IF Z=4 THEN STOP 

6618 GO TO (10 AND Z=1)+(778@2 AN 
D Zz2)4i(58080 AND Z=3)+(6059 AND 
(Z<1 AND Z>4)} 

62200 draw answer box 

6995 PLOT 197,155: DRAWN 8,18: DH 
RU -18,8: DRAH 4,-12: DRAH 12,2 


“SEMAPHORE DRI 
4; “PLEASE CHOOSE 


UB 3700 
3; 


PROMISE LAND ELECTRONICS 


Sinclair QL 


Dan Elliott, Owner 


APA 
JEFYICINE COMPUTERIZED 
electronic equipment 


TS-2068 


16K Ram Pack ZX-81 Memotech Modules 


Commodore 64 VIC-20 PLUS-4 C-16 


Coleco ADAM 


TI-99/4A Commodore 128 


Write for prices: 


Dan Elliott 


Route 1, Box 117 
Cabool, MO 65689 


(314) 739-1712 evenings, Sunday - Thursday 
(417) 469-4571 weekends. 














5900088 answer routine 


78988 PRINT HT 


1.035 as 


AND cib= 


10144"B"” AND czb=2 AND c+b=b1+t 


C" AND czb=15 AND C< 


ydla ("D” AND 


C#b=234+(°E" AND cib=1414+1"F" AN 


D cxb=5 AND c+ 
i2 AND c+b=ò! 
70818 PRINT AT 
28)+1"I" AND c 
b=31+1"K" AND 


7020 PRINT AT 
4 AND c+b=514+1( 


b=8 AND c+b=31 
7030 PRINT AT 
6 AND c+b=Z7i+i 
X" AND cxb=421 


ND c+b=111+1"Z"_ AND cxb= 
7590 


MBERS” AND C Z b 


b=S}4+¢"G" 


a THF 
zb=4g1 +1" 


AND cxb- 
AND cxb= 


J" AND cx 


cib=51+1("L" AND cx 
b=35)1+1"M" AND CDU T AND 
Cxb-3014("0” AND c#b=3e 


RT 


AND c#b= 


"9" AND cxbzgailei^" 
R“ AND c#b=12 AND c+b=7)+1"5" AN 
D cxbz24 AND C+b= 19) +(°T" AND cx 


+1"U" AND 
IB 


c#b=56) 
AND cxb= 


"U" AND Cxb-21!-4i" 


+i"Y" AND 


zl 


7835 IF Z=2 THEN GÜ TO 


7045 PRINT i: 
GO TO 9080 


cib=24 A 
13) +1 "Nu 


e 
PAUSE 18: NEXT i: 


7499% interactive routine 
500 PAUSE 180: PRINT AT 20,1)”P 


Ag G. for ano 


ther go. 


Press N t 


7510. TÉ INKEYS="" THEN GO TÜ 750 


e 
7515 GO TO (18 AND INKEYS="Y"1+1 
ið AND INKEYS="y") 


7520 CLS 


cO Tü 


$="N")+(6019 AND INKEY $= 
@@ AND CODE INKEY$<>78 AND CODE 
INKEY$<>89 AND CODE INKEY$<>112 
AND CODE INKEYS$:»121! 


mə azis to start 
7705 PAUSE a 
7710 IF INKEYS 


87208 draw 
8710 PLOT 2@,@ 


3712 DRAH 255,8: 


U -255,0: BRAY 


(6010 AND INKEY 


nol (76 


m"" THEN GÜ TÜ 771 


a 
7720 GO TÜ 7512 
aon graphics for 


flag cent 


€",BIN 00011022 


"E"41,BIN 
"e" 42,BIN 
"Eg"43,BIN 
"g" 44 ,BIN 
"e" 45,BIN 
"Eg" 46,BIN 
"g"47,BIN 


aaiiiiesé 
21111118 
11111111 
11111111 
aiiiilid 
20111120 
28211822 


Z ,BIN 200000081 


"Pil, BIN 
"F"42,BIN 
"F"33,.BİN 
“f”+4,BIN 
"F"35, BİN 
"f'"46,BIN 
"F"47,BIN 


20200011 
202808111 
vg000111i 
gede111i 
20200111 
v0000011 
v20000081 


ig ",BIN 10000000 


“9"+1,BIN 


11202429 
111999009 
112199009 
11119999 
11109909 
11900000 
190000009 


"BIN aadaganan 


R.L BIN 
"a"42,BIN 
“a'+3,BIN 
"3a"44,BIN 
“a'+5,BIN 
“a "+6, BIN 
"a" '+47,BIN 


varudasa 
dazazasa 
veseodasa 
OOG 11909 
üğliliğü 
61111119 
121111111 


SBDUOBINCIETITIIII 


“bh”+6,BIN 
"b"47,BIN 


@1111118 
veliiiga 
22811022 
28020020 
aazasALA 
oocodağü 
2008009000 


c",BIN gogogaga 


*24+1.BIN 
"UC"42,BIN 
"UC"4G3G,BIN 
“c44, BIN 
“c45, BIN 
“c40, BIN 
“C"+7,BIN 


border 


B;-175 


GRAY a, 


aiiiiliv 
aiiiilid 
61111119 
@1111118 
@11111128 
@1111118 
cocodağü 


175: BRA 


goto select another 58 lett 
ers on auto-run 


gaas CLS 


04109 IF Z=2 THEN GÜ TÜ 


7502 
































gaža IF Z-i THEN PRIN! Hl Gli u 

Baule “you Like another fiftu”,HT 
ie, VUetters? B A T S PRUSE” a 

030” IF CODE INKEYS=89 OR CODE I 

NKEY$-i21 THEN GÜ TO 2858 

90840 IF CODE INKEY$«?39 AND CODE 
INKEYŞs3i21 THEN RUN 

2845 STOP 

aasa CLEAR LET Z=1: 60 TO 160 . 

O499ENEEENE variable for catculati 

ng angies of flags 

29509 LET a=50R 8? RETURN y 

9990 SAVE “SEMAPHORE” LINE 1 
9999 STOP 


Figure 1. LISTing of SEMAPHORE 
drt L L | 
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TYD BYTS 


PRO/FILE TO MSCRIPT 


Paul Holmgren 
Indianapolis, IN 


When you don't know any better, anything might be 
possible, Operating on that theory I said, "Why 
not?". 


I loaded version 5 of Jack Doheny"s Mscript and then 
stuck a tape in my recorder that contained a file 
saved by the cartridge version of Tom Wood's 
PRO/FILE. Using the BASIC operating system menus to 
5: LOAD/SAVE, then 4: LOAD NEW TEXT, and giving the 
PRO/FILE filename when prompted by MSCRIPT for 
FILENAME, I attempted to load the PRO/FILE file into 
MSCRIPT. Imagine my surprise when it appeared to 
actually load into the computer! A quick trip to 
MSCRIPT showed that the file was indeed there. The 
only problem with it was in the control codes used 

by PRO/FILE. A simple modification solved the 
problem, 


I added these lines to the end of my version of 
MSCRIPT: 


1000 FOR i-S TO S+LN: IF PEEK I= , 
42 OR PEEK I-1 THEN POKE I,13 
1010 NEXT I: GO TO 600 


From BASIC I issued a GO TO 1000 command which re- 
formatted the PRO/FILE data for MSCRIPT usage. Once 
back in MSCRIPT, all I had to do was rearrange the 
file as I wanted it to appear. 


Afterwards, I decided to make the changes a 
permanent part of my version of MSCRIPT. Along with 
lines 1000 and 1010 mentioned above, I made the 
following additions and changes and saved them to my 
permanent copy of MSCRIPT: 

LINE 600: add "6: FORMAT PRO/FILE file" 

LINE 610: change K$>5 to K$>6 

Add line 613 IF K$-"6" THEN GO TO 1000 

LINE 1000: echange GO TO 600 to GO TO 50 

Try this to see if it will work with your versions 


of MSCRIPT and PRO/FILE. It makes these two fine 
programs even better. 





Communicatio 


LL 


JES 


TS2068, BASIC 
Peter Wentworth 


(Editor's NOTE: this program could easily be 
adapted to the ZX81/TS1000 computer. Would anyone 
like to try?) 


Blinker Signaling 


This program simulates a blinker signalling device. 
Nowadays, when radio communicators are constantly 
trying to use ever-higher ultra frequencies, we 
tend to forget that blinkers have been using, for 
centuries, frequencies higher than any radio signal 
yet generated. 


Running Flash 


When the program is RUN, night descends. You then 
tell your "instructor" how fast to send your test 
messages, and how many characters to send in each 
group. 


You can then choose any one of three options: 
1. A printed letter followed by the signal 
2. The signal first, then the letter 


3. Your own choice of letters 

If you choose 1. or 2., the choice of letters is 
random; if you choose 3., then you (or the 
instructor) INPUT the message you want, 


Coding Illuminated 


The program, LISTed in Figure 1, is pretty 
straightforward. Line 1 makes sure that your inputs 
will all be in capital letters. Lines 70 to 340 set 
initial conditions, and establish the searchlight 

as User- Designed Graphic "S", As an interesting 
sidelight: you can see the pattern of the light 

if you look sidewise at the LISTing of lines 220 to 
290. 


The "works" of the program are in array M, which is 
loaded with the data given in lines 650 to 1070. If 
you're familiar with Morse code, you'll be able to 
make out the letters within the DATA statements: 6 
means a DIT, and 4 a DAH. The 3's are NOPs 
(do-nothings), inserted to preserve the symmetry of 
the array. 


The searchlight was designed to produce a very 
small pattern, to simulate the appearance of an 


~ 
— 


(RE 


—- 
puc 
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actual ship at a distance. If you want to pretend 
that you have binoculars powerful enough to produce 
a larger display, you can use the statement in 
Figure 2 to replace lines 20, 40, 70, and 90. In 
this case, lines 220 through 290 can be left out. 


(Editor's NOTES:) You may find that the fast speeds 
attainable by this program are unrealistic. In real 
life, blinkers can not begin to approach the speeds 
of radio code, because of the mass of the 
mechanical shutter involved in modulating the light 
beam. 


It is possible to shorten materially the 
initialization delay by the following steps: 


Change line 120 to DIM M$(43,5) 
String array, size is not changed 


changed to a 


Change line 170 to GO SUB 650 
DELETE lines 180 through 210 


Change line 530 to: 
J$(K)-47,1) 


GO SUB VAL M$(CODE 


Change lines 650 to 1070 to the following form: 


650 
660 
660 
670 
* 


LET M$(1)="44444" 
LET M$(2)="64444" 
LET M$(3)="66444" 
LET M$(4)="66644" 
* * * * 


1070 LET M$(43)="44663" 


Add line 1080 RETURN 


1 PORE 23553,3. GÜ TO lie: BEES 
POKE sets capitali letters 

3 RETURN 

4 cO TO 72 

x DII 

28 PRINT HT 18,13; "4": REM gra 


phics “S"“--atso at tines 49,74, 
and 22 

34 PAUSE DIT 

40 PRINT AT 18,13; e" 


58 RETURN 
5 


DAH 
70 PRINT AT 18,13; "e" 
PAUSE DAH 
PRINT AT 18,13; "6" 
RETURN 
DIM uşibü: 
DIM (43,53 
INK 7 
PAPER Y 
BORDER 2 
CLS 
FOR 1-1 TÜ 43 
FOR v=i Tü 5 
READ MiI,d} 
NEXT .! 
NEXT I 


POKE USR “5” ¿BIN dGücücüczü 


















































“+1I.BIN ğücüdğüğü 
“+2,BIN OOO 119092 
'+3,BIN velili2a 
“+4.BIN 281111228 
, tS ,BIN OOO 119909 
299 DOKE USR "S"45,BIN agas 
298 POKE USR “+7,BIN #8888028 


si 
310 PRINT “INPUT SPEED t1-9)”: 
INPUT LPH 
320 IF LPH?10 THEN PRINT “ERROR 
: NUMBER TOO HIGH": GO TÜ 312 
338 PRINT “GROUPING (1-601“: IN 


238 PORE ar 
240 PORE USR " 
258 POKE USA a 
2580 PORE USR ' 
270 POKE UBR ' 


ih h 


PUT GRP 

348 PRINT "ENTER :“,,,“1 FOR SI 
GNAL THEN LETTER"; ,"2 FOR LETTER 
.— SIGNAL"; ,"3 YOU GIVE LETTE 


350 INPUT O 

360 LET DIT-12/LPH 

370 LET DRH-32-LPMH 

388 LET UP-50-LPH 

398 CLS 

488 PRINT HT 1,1; 'LETTERS,/SECON 
D = ";LPHx.335 

410 IF Q=3 THEN PRINT HT 2,1;"E 


420 FOR K-1 TO GHD 

430 IF 0<>3 THEN LET US (K} =CHRS 
INT iRNDx434431: IF Jd$iK)«c"H8" A 
ND J#(K1>"9" THEN GO TO 430 

448 IF 0<>3 THEN GO TÜ 480 

450 PAUSE a 

460 LET J$iK)=INKEY$ 

465 IF J$£iK) «"H" AND J$(KI «“Q" 
ÜR J$iK)»"Z" THEN GO TÜ 450 

470 PRINT us$iüki, 

480 NEXT K 

498 PAUSE 32 

500 IF O=2 THEN PRINT AT 12,13; 
... PAUSE GO+cRP 

10 FOR K-1 TÜ GRP 

S20 FOR I-1 TO 5 

539 GÜ SUB H (C CODE d$iki-47,11 
540 PAUSE UC 2 


550 NEXT I 

560 ad AP 

570 NEX 

sað IF Ou 53 THEN PRINT HT 12,13 
tul 


599 IF GRP»2 THEN PRINT AT 22,1 
¡"ENTER ANY KEY Tü CONTINUE": PA 
USE ð: LET K$-INKEY$: GO Tü 399 

688 PAUSE 60 

ödü GÜ TÜ 398 


650 DATA 4,4,4,4,4 
560 DATA 5,4,4,4,4 
570 DATA 5,5,4,4,4 
688 DATA 5,5,5,4,4 
698 DATA 5,5,5,5,4 
700 DATA 5,5,5,5,6 
710 DATA 4,65,6,6,6 
720 DATA 4,4,6,6,6 
730 DATA 4,4,4,6,5 
740 DATA 4,4,4,4,5 
758 DATA 3,3,3,3,3 
760 DATA 3,3,3,3,3 
779 DATA 3,3,3,3,3 
780 DATA 3,3,3,3,3 
790 DATA 3,3,3,3,3 
3920 DATA 3,3,3,3,3 
310 DATA 3,3,3,3,3 
828 DATA 6,4,3,3,3 
830 DATA 4,6,5,6,3 
840 DATA 4,6,4,6,3 
ƏDƏ DATA 4,6,6,3,3 
868 DATA 6,3,23,3,3 
378 DATA 6,6,4,6,3 
388 DATA 4,4,5,3,3 
890 DATA 6,5,68,5,3 
900 DATA 6,6,3,3,3 
910 DATA 5,4,4,4,3 
920 DATA 4,5,4,3,3 
938 DATA 6,4,8,5,3 
949 DATA 4,4,3,3,3 
358 DATA 4,6,3,3,3 
368 DATA 4,4,4,3,3 
970 DATA 6,4,4,5,3 
29380 DATA 4,4,5,4,3 
990 DATA 6,4,5,3,3 
1888 DATA 6,6,6,3,3 
1010 DATA 4,3,3,3,3 
1020 DATA 6,6,4,3,3 
1030 DATA 6,6,6,4,3 
18040 DATA 6,4,4,3,3 
1059 DATA 4,5,5,4,3 
1060 DATA 4,0,4,4,3 
1079 DATA 4,4,6,6,3 


Fig. 1 LISTing for FLASH 
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20 PRINT HT 10, də AT 11, 


12; "HMB"; AT 129.19: 


NOTE: Graphics are as follows: 


Ist line: Shifted 2, Shifted 8, 


Shifted 1 


2nd line: Shifted 8 (three times) 


3d line: UNshifted 7, Shifted 8, 


Fig. 2 A larger searchlight 


TYD XBYTS 


PUT AUDIO ON YOUR TAPE 


Shifted 4 


If you're using tape for mass storage, you may be 
neglecting a very valuable resource. It's awfully 
easy to forget that the tape was designed for audio 
signals. The audio capabilities can be exploited in 


a number of ways: 


1. You ean put a short voice message in front of 
each SAVE, giving information like the program 


name, the peripherals required, etc. 


2. (For the TS2068) If your recorder has MONITOR 
capability, you can insert a customized BEEP 
message at the end of a SAVE, and a different 
message to indicate that the tape should be left 
running, as to load bytes of machine code. 


REM LINE UTILITY FOR TS2068 


Paul Holmgren 
Indianapolis, IN 


This utility allows you to create very easy to read, 
and nicely formatted REM lines with less than the 
expected memory usage. Try it by entering the 


following lines on your TS2068: 


1 REM SSSSREM Line Utility De 
signed by:88Paul Holmgren85321 W 
ilton Wood Ct.SIndy, IN 46254888 

10 FOR f-26714 TO 26714*PEEK 2 
6712:1F PEEK f-94 THEN POKE f,6 
15 NEXT f: STOP 


(EDITORS NOTE: 8 - TS2068 up arrow symbol) 


If your REM line is longer then 255 characters then 
replace the PEEK 26712 in line 10 with (PEEK 26712 
*256*PEEK 26713). As you can see, approximately 140 
bytes of "empty" REM spaces have been replaced with 
a mere 12 bytes. Once you have finished expanding 


the REM, DELETE 10,15. 





























A TOUCH OF CLASS (ROOM)... 


Here we have another set of programs tied together 
by a common thread. Both of the folloving programs 
were designed for classroom use--and by authors 
that are in position to make a direct test of the 
audience response to their programs. Alex Sweitzer 
is himself a teacher, while Shawn Byrne's mother 
teaches a fourth grade that has five TS1500s 


operating in their classroom. 


There's an element of mutual good fortune here. 
Alex and Shawn are lucky, of course, to have such 
ready access to "market research". But the 
youngsters are doubly lucky. Lucky not only to have 
&ccess to computers, but also to have teachers that 
can make innovative and effective use of the 
computers' potential. 


GEOMETRY PLOTTER 


TS1000, 16 K, BASIC 
Contest entry 
Alex R. Sweitzer 


This is another program by the winner of the TS1000 
section of our contest. Mr. Sweitzer tells us that 

his program has been "field tested" in his 

classroom, He also reports that he has one pupil 

who is turning into a real computer enthusiast as a 
result of his work with the good ol' ZX81. More 
power to you, Alex! 


The program is pretty straightforward, and contains 
its own instructions. In reply to the computer's 
prompts, you specify X1 and YI, X2 and Y2, and 
which one of eight given symbols will be used for 
the plot. The computer then plots the straight line 
(or as close as it can come to a straight line, 
given the block-graphics limitations of the 
computer) from X1,Y1 to X2,Y2. If your selection of 
co-ordinates is not within the allowed range, a 
humorous error message is given (line 930). Which 
is fair, because you've been told ahead of time 
what the acceptable limits were. 


Editor's Comments 


It's obvious that the author is a teacher, from the 
fact that the program describes him as "Mr. 
Sweitzer" (no first name). He says that the program 
is being used by students between 8 and 12 years of 
age. What he didn't mention is that some of us 
slightly older people can find it an interesting 
medium for drawing pictures. 


I wasn't able to make the ERASE function work the 
way I thought that the instructions said it would. 
Maybe this is an example of Tom Lehrer's comment on 
New Math: "It's so simple that only a child can do 
it." 


Similarly, I didn't find any provision for aborting 
the program. Sure, we old hands know how to 
frustrate the computer by INPUTting an unknown 
quantity, or (if a string INPUT is requested) a 
STOP, after EDITing out the quotation-mark prompt, 
but fifth-graders may not know about those devious 
techniques, 


One other refinement that might make the program 


more educational would be the display of X and Y 
scales, 


But it's a fun program, for a" that. 





NOTE: the lines 
re as folious: 


z 
^ 
a 




















LET A=-a 

38 GOSUB 1160 

40 GÜSÜB 294 

58 PRINT AT 21,0;"TYPE X START 
ING LOCATION ta-3ii” 

62 INPUT XSTART 

61 LET A-2 

54 toU ET 

78 IF XSTART:31 ÜR XSTART<@ TH 
EN GOSUB 93a 

8@ IF XSTART>31 OR XSTART «A Ti 
EN GOTO Sa 

98 GOSUB 278 


>"; XSTART 


110 FÜR P-1 TO PP 

120 IF INKEYS="M" THEN GOTO Sa 
130 NEXT P 

140 PRINT AT 21,8; TYPE Y START 
ING LOCATION (1-211” 

150 INPUT YSTART 

154 REM 

1690 IF YSTART>21- OR YSTART<1 TH 
EN GOSUB 334 

170 GOSUB 2370 

180 IF YSTART>21 ÜR YSTART<1 TH 
EN GOTO 140 

199 PRINT AT 21,8; "YOU ENTERED: 
>" 5 YSTART 

288 FÜR P=1 Tü PP 

219 IF INKEYS="M" THEN GOTO 140 
228 NEXT P 

238 GOSUB ava 

248 PRINT HT 21,0; "ZHEE 


258 PRINT AT 21,20,"1(Xz",XSTART 
)U/ZYae",YBTART,”)ı” 

268 PAUSE 199 

270 PRINT HT YSTRRT-21,XSTHRT;" 


238 PRINT AT 21,0:” TYPE X ENDİ 
NG LOCATION (0-31) x 

290 INPUT XEND 

294 REM 

390 IF XEND>231 OR XEND<@ THEN G 

ÜSUB asa 

319 IF XEND:31 OR XEND«2 THEN G 

ÜTÜ 280 

328 GOSUB 972 

339 PRINT AT 21,8; “YOU ENTERED: 

>"; XEND 

348 FOR P=1 TO PP 

359 IF INKEY3="M" THEN GOTO 280 
368 NEXT P 

370 GOSUB 972 

389 PRINT AT 21,0;" TYPE Y ENDI 
NG LOCHTION (1-21) x 

390 INPUT YEND 

394 REM 

400 IF YEND>21 OR YEND<1 THEN d 
OSUB 938 | 
410 IF YEND>21 OR YEND<1 THEN G' 
OTO 380 

420 GOSUB 979 











5 AT 21,0;"YOU ENTERED: 


m 
Fa 


440 FOR P-1 TO PP 
50 IF INKEY$-"H" THEN GOTO 380 
460 NEXT P 

470 PRINT AT 21.0: "i 


L 


4580 PRINT AT 21.20 

XS END O 2? 

“430 PAUSE 1900 

500 PRINT AT YEND-21,XEND; "E" 





569 LET U=XEND-XSTART 
5780 LET M=ABS (U) 

589 LET XI=SGN tul 

598 LET X2=x1 

600 LET U=YEND-YSTART 
610 LET N=ABS (Uu) 

629 LET YI=SGN (U) 

639 LET Ya=Y1 

640 IF MN THEN GOTO 700 
650 LET U=N 


718 LET ss -INT (1/23 
730 PRINT AT YSTART-21, XSTRRT: 


oxu LE a “THEN GOTO 819 

788 LET S=S5-M 

798 LET XgzX1 

588 LET YO=Y1 

518 LET XSTART-XSTRRT-XQ 

620 LET YSTART=YSTART +YO 

639 NEXT I 

B40 LET XSTRRT-XEND 

558 LET 57”. 
568.PRINT HT 21,9; =CONT. /E=ZER 
ASE /P=-PRINT “R=RUN->" 

562 INPUT R£ 

563 PRINT RẸ 

565 PAUSE 58 

679 IF A=1 THEN LET NN=H 

675 IF RK="C" THEN RETURN 
999 IF R£-"E" THEN GOTO 1640 
910 IF R£="R" THEN GOTO 40 
929 IF R£-"P" THEN COPY 

923 GOTO 566 
PRINT — 21. Oi 





949 PAUSE 200 

959 GOSUB 978 

968 RETURN 

Be PRENT-AT.21,0,- 


1000 PRINT AT 2,0; “PLEASE ENTER 
ONE OF THESE CHARACTERS FO 


R THE PLOTTING SYMBOL." 

LOLA PRINT .“1- 202 Jen 7:5... 
lq A E O => 
1020 PRINT ....“EMNTER NUMBER NEX 


OR RR>S THEN GOSUS 
1050 IF RR:1 OR RR:6 THEN GOTO 9 


1050 IF RR=1 THEN LET NN=128 
1070 IF RR=2 THEN LET NN-23 
1050 IF RR=S THEN LET NN=27 
1030 IF RR=4 THEN LET NN=28 
1199 IF RR=5 THEN LET NN=21 
1110 IF RR=6 THEN LET NN=22 
1120 IF RR=? THEN LET NN=14 
1130 IF RR=6 THEN LET NN=5 





1169 PRINT AT 35 5; Sor. HR. sve TT 

ZER“; AT 17,85 “FEBRUARY li. 19B85- 
1190 PRINT AT 19,5; “UPDATED JANY 
ARY 28, 1387" 

1200 PRINT AT 21,0;"PRESS <C> TO 
CONTINUE ... 

22102 İNKEV $=" C" THEN GOTO 124 


8 
1229 PRINT AT 21,0;" 
1239 GOTO 1289 








20 


1246 CLS 
1250 PRINT “Sé TATR 

1260 PRINT , “PATÉ PROGRAM UILL 
SHOU YOU HOU TO BLOT ON A GRID 
JUSTE LIRE IN YOUR HRTH.BOOK. F 
PROT qur. 

1278 PRINT "SHOU YOU THE NÜHBER 
FOR X(@-S1) AND FOR Y(1-21). ST 
DY THE GRID." 

1268 PRINT "NEXT YOU MUST SELECT 
A SYHBOL TOUSE FOR YOUR PLOTTIN 
G(1-8)." 

1299 PRINT “AFTER THAT YOU SELEC 

T BOTH X ANDY STARTING LOCATIONS 
. I HELL” 

1300 PRINT "PLOT THESE POINTS FO 
R YOU.  THENI WILL ASK FOR BOTH 
X RND Y" 

1310 PRINT "ENDING POINTS. I UI 
LL CONNECT THOSE TUO POINTS. Y 
QU THEN HRY CONTINUE TO PLOT RND 





c 
~ 
U 
T 





CONNECT" 
1320 PRINT "POINTS. PAE. YOU 
ENTER A WRONG NUMBER YOU HRY 
PRESS THE" 
1330 PRINT "LETTER <M> TO CORREC 
T YOUR URONGNUHBER. YOU RRE GIU 
EN RBOUT" 


1349 PRINT AT 21,0." PRESS <C> TO 
CONTINUE RERDING..." 

1350. IF INKEY$-"C" THEN GOTO. 137 
g 


1360 GOTO 1350 

1370 CLS 

1380 PRINT "ONE TO TUO SECONDS T 
O PRESS <M> AFTER I SHOW YOU THE 
NUMBER THAT" 

1390 PRINT "YOU ENTERED." 


1420 PRINT .,"IF YOU PLOT AND CO 
NNECT YOUR POINTS YOU CAN ERA 
SE YOUR LINES AND POINTS IF You 

PRESS «E»" 


1430 PRINT “INSTEAD OF <C> WHEN 
ASKED.  UHENYOU PRESS «E: YOU MU 
ST- CENTER THES 

1440 PRINT "X AND Y URLUES FROH 
THE PREUIGUSHOUE. THE COMPUTER 
UILL CONNECTYOUR MISTAKEN POINTS 
UITH YOUR” 

1450 PRINT "PREUIOUS POINTS. TH 
E COMPUTER  UILL USE BLANKS UHIC 
H LOOKS LIKEIT IS ERASING. CONT 
INUE ON AS NORMAL AFTER ERASING 


LINE." 

1469 PRINT AT 21,8; PRESS «C» TO 
START PLOTTING..." 

1465 PRUSE 4E4 


1430 CLS 

1500 PRINT 7 57/591111111111 
22222222223 0123456789 
812345675981" 





1510 PRINT AT 4.0: 


1520 PRINT AT 6, LUi BTO FIY 
1530 PAUSE 186 

1540 FOR U=1 TO 21 

1550 PRINT AT 21-U,Q0;U 

1569 IF U?3 THEN FAST 

1570 NEXT U 

1550 SLOW 

1590 PRINT AT 17,2," 


1588 PRINT HT 19,18; ti TO 21)" 
1518 PRINT AT 21,0;"PRESS «£> TO 
CONTINUE” 
1629 IF INKEY 








1680 PRINT AT Sit st 


1699 PRINT AT “USE PREVIOUS 
«X» AND <Y> VALUES K 

1700 PRUSE 200 

1710 RETURN 

1720 SAVE “PLOM" 

1730 RUN 





MULTIPLICATION 


Shawn Byrne 
TS1000 16K 
Contest entry 





This program is designed to lead students, step by 


30 INPUT Ri 


step, through the intricacies of multiplying 40 PRINT AT 1,9; "MULTIPLIER T 
multi-digit numbers. You are first asked to specify a 25 iə s ” 
the range of multiplicand (to 999,999) and 577” 
multiplier (to 999). Then the computer asks your 66 CLS L bi 
name, and courteously addresses you by that name 67 PRINT "HELLO, TYPE IN YOUR 
NAME AND THEN PRESS ENTER. 
throughout the program. (I wonder how many students 58 INPUT Z$ 
give in to the temptation to use a rude word here, 71 CiS : L R ge 
or at least a colorful nickname--ed.) You are then TE PRINT Zş:“. THIS IS AN"; TAB 
a; "EASY AND FUN WAY TÜ LEARN", 
asked to decide how many problems you are going to MULTIPLICATION. E 
set for yourself to do. 73 LE 75 
we LS 
75 PRINT “HOU MANY PROBLEMS DO 
From then on, the program leads you, step by step, YOU”, WANT Tü DO07",,"TYPE IN TH 
through the multiplication of a pair of numbers, E NUMBER" ,” AND PRESS ENTER.” 
chosen at random within the limits you have set, ae dN Tü z 
Every character is blinked in the sequence in which si CLS 
it should be handled. Even "carries" are taken into 2 FEE sər Bu (0 
as a$=STA M iRNDxR2-4il:! 
consideration, sü LET L-LEN R 


a tm 
95 LET FELEN D$ 
1899 FOR A=U Tü L 
110 LET B=UAL Aftii+ii-Ai+l 
120 LET C=33-3%A . 
139 PRIME HT ¿EN T ui; es 
Fig. 1 MULTIPLICATION NS IB, ; TAB AT ye 2 

TUTOR in action 140 NEXT H 
158 PRINT AT 6,21;' Re TAB 21;" 


164 LET C=328 


174 LET B=VAL Si$iEi+l 
(note the prompt to 180 PRINT AT S- C N$ iB,UI ; TAB C; 
NC ¡TAB C;N$(B,3! 
CARRY 3, above the 8) Ə-F E-U THEN BÜTÜ 230 


2@@ LET C-27? 
210 LET B=VAL 5 

220 PRINT AT :5,0; 
N$(B,2 1; TAB C:N$( 

238 PRINT AT won cg w 
335 IF L»4 THEN PRINT AT 3,33-3 





If you give a wrong answer, the computer xL;L$i TO 3xsL-iü! = bz 
insistently blinks the steps again, and keeps on ETRE THEN: PRINTAH SEX: 
doing so until your answer is right. When you have 259 PRINT AT 2.2; M$ 
successfully completed a problem, the computer asks ae EET 5 dA Ñ A $-E) 

70 =IB-Ixi üş-E) 
you whether you would like to do another (unless 272 IF ƏŞULEN 0$1<>"4" THEN GOT 
you have already finished the number that you o 288 > 
contracted to do). If you say "no", prepare for a 274 LET Peas gi cu +U 
shock--see line 869. O LEL GS 


278 PRINT RT 3,30; “4 TAB 30:” 
EE". TAB W PW. 
Editor's Comments 300 FOR H-U TO L 


310 LET B=VAL R$il+l-Ai+l 
328 LET B$=5TA$ ((C-U) <1B-Ul +UA 


They say you shouldn't judge a book by its cover gora K=9 
e -5 
(or my daughter tells a story that indicates that 320 LET F=33-3%A 
you shouldn't book a judge by his cover). It's hard 5 nə = 05:32 OR Ecoli AND 
33 TEEST R Eu! D 
to follov that advice in this case, though. The I$ (LEN at Tea” THEN GoTo 358 E 
cassette box was neatly labeled with all that an 337 LET uU=F-3 i y = 
editor needs: name, address, and telephone number ə sə 0$ (LEN üğlc3”0" THEN GOT 
of the author; title and SAVE label of the program; 345 GOTO 352 
a list of the hardware needed. A dream! 348 LET K-13 
358 FOR G-4 Tü 2 
355 PRINT AT U,F;" "J TAB F;" 
; : "TRR PI" A 
I have just three criticisms, two of them trivial: 360 PRİNT AT U,F;NSIB,UI;TRB F; 
first, there is no provision made to abort the N$ iB, ¡TAB F¡N51B,3) 
program, and second, you're a little way into the ... NEXT m Td 
3 ÜR G= uz 
program before the computer asks your name. Sort of 382 PRINT AT 5,21;" "¡TAB 21;" 
reminds me of those irritating TV commercials, a 
where the salesman makes about a third of the 384 PRINT AT 5,21; "NAM; TAB 21)” 
" 1 
pitch, and then says "Hi! I'm Fulano de Tal", or 336 NEXT G 
whoever. Maybe some psychologist said that it's 383 FOR G=U Tü 2 ~ x 7 
good sales technique. Possibly Miss Manners would tae mE e AT S,H,” “i TAB A; 
concur, but I dunno. 392 PRINT AT SUE W ¡TAB H; 
—.- BA H: NS ( 
littl 3a xT 6 
A . 57 I think it would have 395 IF Cg="a@" THEN GOTO 450 
een helpful to display the correct answer if a 400 FOR üzü TO 2 
student gave the wrong reply more than once, 483 PRINT HT B,F-i;"y" 





406 FÜR I=U TO 2 

489 NEXT I 

412 PRINT HT £,F-U:” 

415 NEXT 6 

418 FOR G=U Toe 

421 PRINT HT B.F: T 

424 PRINT HT M.F; ca 

27 FOR I=U TO 2 

430 NEXT I 

433 NEXT G 

450 FOR G=U TÜ su 

465 PRINT AT Kout; ae TAB ui" am 
"TAB Ji" a 

479 LET As= INKEYS$ 

480 IF Ag>="8" AND A$«="9" THEN 
GOTO 510 

480 PRINT AT Ku ^ "ITHB do 
“TAB y; 

sog NEXT G 

585 GoTo 348 

510 PRINT AT Kou; N$ (VAL A$+U. Li 
¿TAB d; NS VURAL A$+U,2!; TAB Ji NS iU 
AL as+l, 
20 E'B&-B$ (LEN B$) THEN GOTO 


5309 FÜR Gözü TO la 

548 NEXT 6 

558 GoTo 348 

560 IF LEN Bs=U THEN GOTO ses 
570 IF A=L THEN GÜTÜ 680 

572 FÜR özü Tü 5 

574 NEXT G 

530 PRINT HT 8.F-23;"7" 

Sağ LET AS=INKEYS 

6009 IF n$o-"à" AND AS<="9" THEN 
GOTO 6328 

618 PRINT HT B,F-3;" " 

620 GÜTÜ 588 

638 PRINT HT 4.F-3:A5 

6409 IF H$£-B$iii THEN coro esa 
654 FOR Gözü Tü id 

560% NEXT 6 

678 GOTO 340 

688 LET C$=-A$ 

682 coro gia 

699 LET uU=u-3 

695 PRINT AT K,d; “aa TAB Jj” æ 
“¿TAB d; 

700 LET As= INKEY $ 

710 IF Aş.-"Q" AND A$«="9" THEN 
GoTo 740 

728 PRINT AT K,J;"  ";TRB Jj” 

a R TAB d I a 

734 GOTU 695 

740 PRINT AT Ki NS$IVAL A$+Li, Li! 
¡TAB J;N$IVAL A$+U,2:!; TAB J:NS (U 
AL AS+U. 3} 

758 IF H$-B$iil! THEN GOTO 600 
764 FOR G=U TÜ la 

770 NEXT G 

780 PRINT AT K,J;" “¡TAB d;" 
STTHBOg; - € 

790 GOTO 338 


815 IF QO$(LEN ü$)-"à" THEN GOTO 


324 IF E-2 THEN GOTO Sad 

325 IF LEN Q$=2 THEN GOTO 3249 
338 FOR G-U Tü 190 

348 NEXT 6 

341 IF Z<>U THEN GoTo ase 

342 CLs 

343 PRINT ,.DO Yüu WANT TO DÜ”,” 
SOME MORE Z$; 

344 PRINT "PRESS Y FOR YES OR MN 


345 IF INKEYZ£-"Y" THEN GOTO 74 

346 IF INKEYH="N" THEN GOTO 685 

347 GOTO 845 

849 GOTO 56 

354 CLs 

8355 PRINT “GOOD, “:Z$,TB “Da 
YOU WANT Tü Dü ANOTHER?" . P PRESS 
Y FOR YES ÜR N FOR NO" 

360 LET AS=INKEYS 

363 IF H$o»"Y" AND H$0»"N" THEN 
GOTO gga 

866 IF Ag="Y" THEN PRINT "OK,."; 
869 IF H$£-"N'" THEN PRINT “TOU B 


rün 


m 


DUE i 

372 PRINT " HERE WE GO AGAIN” 
374 FOR üzü Tü su 

az5 NEXT 6 

377 NEXT U 

aad GOTO 66 

2900 LET E-L 

385 PRINT AT 13,230; “Ri TAB 30, 
"E PETAB 30; ‘Sat’ 

910 GÜTÜ 250 

SNP LET J$=STRS (URL RAFUAL ü$: 
D3) 


30 LET K$=25TA$ (102URL R$sURL 


33 LET D-LEN J$ 
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938 LET 755 Ks 


asa FOR A=1 TO E 

96@ LET F=33-3%A 

9362 LET C-URL KSiETU-HI +U 

363 IF Hop THEN GÖTÜ 1025 

965 LET B=VAL J$(D+U-A? +U 

968 LET B$=3TA$ (C+B-2+UAL C$! 
aza FOR G=U TO 2 

875 PRINT AT 9,F;" “¡TAB fi" 
"RENS Fr” 

888 PRINT AT Ə,F, ANE (BU); TAB a 
N$(B,2); TAB F;N$(8,3) 


999 NEXT G 
1600 FOR G=4 Tü 2 c 
1010 PRINT AT 14,4; "a"; TAB H; "F 


1015 PRINT AT 14,H;" “¡TAB H;" 


19629 NEXT G 

192929 coro i838 

1825 LET B$=5TA$ (C-U+VAL CH) 

ina FOR G-U Tü Z 

i832 PRINT AT 13,F;" o DAB FE 
"Bı 5 

1034 PRINT AT i3,F;N$iC,U3; TRB F 

jNS(C,23; TAB F; NS iC, 

1036 NEXT € 

1933 IF C£-"à" THEN GÜTÜ 1070 

10496 FOR G-U Tü 2 

i843 PRINT AT 844£xin»D),F-U;"- 

1046 PRINT AT 3+4%1(A>D1 ,F-U; CHRS 
(iaüziHn:D! 

194.9 NEXT G 

i852 FOR G-U Toe 

1058 PRINT AT 8s4xiBoD).F;" " 

1058 PRINT AT 3+4%1A>D1,F;,C0% 

1961 NEXT G 

1974 FOR G-cü Ta Sü 

iaga PRINT AT i7,F;""*.'; TAB FP)” 


+ ¡TAS Fi" 

1090 LET A$=INKEYS 

1100 PRINT AT 17,F;" "¡TAB Fi" 
... ; TAB I .. sa 


1110 IF As>="4" AND A$«="9" THEN 
coro i2ae 

11209 NEXT 6 

1130 GOTO 97245604 (1A>D)? 

12 aa PRINT RT AFFE; RARE FE u 
¡TAB F; N$ (URL Ag+, ; TAB N$ T 

UAL A$+U, 31 

1210 IF A#¥<>BS {LEN B$) THEN GOTO 


e 

1228 IF URL B$£:-9 THEN GOTO 1370 
1530 FOR G-U TO 6 

1240 NEXT G 

1245 IF A=E THEN GOTO zaga 

1250 PRINT HT 8Bs4xin»-D):,F-23; "7" 
1268 LET A$=-INKEYS 

1570 PRINT AT 344% 1A>=D)1,F-3;" " 
1580 IF Bşcs"ü" OR H$»"9" THEN 60 

TO 12358 

1299 PRINT HT 844xiH»-D!),F-23;H$ 
1380 IF H£-B$ill: THEN GOTO 1340 
1310 FÜR G-U TÜ 19 

1320 NEXT G 

13308 coro 972 

1340 LET CH=-A$ 

1350 GÜTÜ 1400 

1370 LET Cg$="2" 

1480 NEXT A 

1410 GOTO 338 

zaga FOR 6-4 TÜ Sa 

2010 PRINT AT 17,F-3;' AW"; TAB F- 
3; " m TAB F-3;'a : 
2015 LET A$= INKEY $ 

2420 PRINT AT i? AAN AAA Fè 
aça "TAB F-3, E 

2838 IF Ap ra" AND H$cz"9" THEN 
GOTO 2858 

20409 NEXT G 

245 coro 1130 

2858 PRINT HT 17,F-3:N$ (URL A$+U 
UI; TAB F-3;N$iUHL A$+U,2); TAB F 
-O;NS$ (VAL A$+U, 31 

2078 IF ARF<OBR (UI THEN GOTO 1138 
2498 GOTO 332 

goga LET u=1 

382 FAST 

9885 DIM NS (19 


SAMA i i-L əmi: T x 
A915 ə — 


8017 LET HM$-" 


gaza FOR A=U TO 10 
3834 FOR B-u Tü 3 
Südü LET N$iH.B1!-H$ 
SASA LET H$£-H$i3 TO ! 
9868 NEXT B 








9979 NEXT A 
9875 SLOU 

9099 coro 2a 
9998 SAVE "ME" 
9999 RUN 


Fig.2 LISTing for MULTIPLICATION TUTOR 


Rather than have you guessing as to what Shawn 


wanted in line 9010 of his listing, I've 
decided to include the "English" version 
of line 9010 here. 


With the GRAPHICS mode selected (press 
and hold the SHIFT key then press the 
'9' key)», press and hold the SHIFT key 

and enter the following: 


TU S BvvPq ás 


Turn the GRAPHICS mode off (press and 
hold the SHIFT key and then press the 
'9' key). Press the SPACE key. 


Turn the GRAPHICS mode on again, press 
and hold the SHIFT key and enter the 
following: 


4$ 8S WT YS 1i1W4*7R—2YYIASS5wuNM 


Turn the GRAPHICS mode off and press the 
SPACE key. 


Turn the GRAPHICS mode on again, press 
and hold the SHIFT key and enter the 
following: 


SE LM LIIDG NY. TIR 


Turn the GRAPHICS mode off and press the 
SPACE key. 


Turn the GRAPHICS mode on again, press 
and hold the SHIFT key and enter the 
following: 


T 


Turn the GRAPHICS mode off and press the 
SPACE key. 


Turn the GRAPHICS mode on again, press 
and hold the SHIFT key and enter the 
following: 


XUY TV VY T PARES 


Your line 9010 should now look like 
Shawn's.- jdm 


Comes The Dawn 


With reddened face, your Editor suddenly realized 
the reason for the "deficiencies" in the Plotter 
and Multiplication programs. I had forgotten 
entirely that they were designed for CLASSROOM 
use, 


Obviously (obvious in retrospect, that is) you 
don't want the little angels aborting the program. 
Policy decisions like that should be up to the 
teacher, Similarly, in the case of the 
Multiplication program, the teacher sets the level 
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of difficulty, and THEN turns it over to the class, 
at the "HI, I'm..." stage. 


Sorry to miss such an obvious point... 


OFF THE WALL 


Daffynitions 


This sort of thing is contagious. Do any readers 
have more to suggest? (I'm sorry that we can't pay 
you for these, except in terms of immortality.) 


UNPLOT - an international conspiracy 

USR - perhaps one of the particpants in an UNPLOT 

PEEK - what Keats said that Cortez was silent on 
in Darien. (Actually, it was Balboa, but who 
cares, besides Mrs. Cortez and Mrs. Balboa?) 

POKE - What you don't buy a pig in a, but what 
you sometimes buy a pig for its 

PAUSE - the things the LINE makes PRINTs with 

FOR - the number of PAUSE per LINE 

OR - native metal 

LOAD - a rich deposit of OR 


P.S. That first bunch came from Fred Nachbaur. Must 
be those Canadian winters. 


TYDXBYTS 


A SHOCKING SUGGESTION 


You've been cautioned to ground yourself before 
touching your computer on dry days, to avoid 
zapping delicate components, The best way, you've 
been told, is to touch some massive metal object, 
like a filing cabinet. Or better yet, a water pipe, 
or something else really grounded. But getting up 
the courage to court a static shock is something 
.like watching Jocelyn test a hot iron with a wet 
finger. So here's how to make it painless: 


a) you can swat that filing cabinet with your open 
palm, and you'll never notice the shock. 


b) or you can hold some metal object (such as a 

screwdriver, a key, a paper punch) in your hand and 
make your ground contact with that object. You see, 
what really bothers you about that shock is not the 


flow of electrons, but the minute amount of intense 
heat generated at the point of discharge. When that 
heat is all generated out at the end of your key, 
you don't feel it at all. 


P.S. This technique also pulls the fangs of your 
car door handle on a winter day. 


CLASSIFIED 


4 SALE:$350 TS2068 V/AERCO INTER- 
FACE, DUAL VAFADRIVE, 2 SPECTRUM 
OP SYSTEMS, LIGHT PEN, SPECTRUM 
JOY STICK, 2 WORD PROCESSORS, & 
100'S OF OTHER PROGRAMS OVER 100 
CASSETTES, 14 WAFERS 10-128K & 
TECH DATA. G.LIPSCOMB, 3402 
BEAUMONT RD, DALE CITY, VA 22193 


Classified Ads are defined as 
those placed by individuals for 
used equipment and the like, or 
by the cottage industry for a 
small quantity of a single item 
or an item of very limited 
appeal. 


The new rate for classified ads 
is $1.00 per 32 character line 
including spaces and punctuation 
(3ust like the format you're 
reading now). Because of their 
low cost, there will be no 
frequency discount for 
classified ads. 


























Send ad material along with 
payment to: 


CLASSIFIED AD DEPT. 
SyncWare News 

1413 Elliston Drive 
Bloomington, IN 47401 


[Rate applies to ads received 
after March 1, 1988.] 


TYD BYTS 


Have you ever tried LOADing a L-0-N-G tape intc 
your Z X81/T8S1000, only to find out at the Nth 
minute that your cassette player had the wrong 
setting of the volume control, or of the tone 
control? Or possibly a mis-alignment of the head? 
According to Murphy"s law, you never discover such 
a misadjustment until just before the moment that 
LOADing is complete. 


So here's what you do. Every time you SAVE a lon 
program, SAVE this program just before it, on the 
same tape, of course. 


100 SAVE "TEST" 
110 CLS 
120 PRINT,,,,"TAPE SETTING OK" 


Then LOAD this short program before you try the 
big one. If it LOADs all right, you at least have e 
fighting chance at the long one. 





SyncWare 


CONTENTS 


SUPPORT... 2 
TELECOMM UPDATE.... 2 
A SOUND APPROACH 

TS2068, B. Wentworth.... 7 
TYD*BYTS 

Various places around 

the magazine.... 
FLAGGING INTEREST 

Lozucozus Gilbert.... 10 
COMMUNICATIONS IN A FLASH 

TSAN68 P: Wentworth.... 13 
GEOMETRY PLOTTER 

ESOO? A. Sweltzer.... 15 
MULTIPLICATION TUTOR 

15007 5. Byrne.... ET 
BASIL'S COMPENDIUM 

280 Machine Code, 

B. Wentworth.... 20 
BUG- ALGERT: res 23 
OFF THE WALL 

Daffynitions Revisited...23 


Submissions, announcements, letters to the Editor, 
and all other material of editorial interest should 


ADDRESS CORRECTION REQUESTED 





Editor: 
Basil Wentworth 
1413 Elliston D 


Bloomington, 'N 47401 


News 


SyncWare News 
602 S. Mill St., Louisville, OH 44641 


Bulk Rate 
U.S. POSTAGE 
PAID 
Louisville, OH 
Permit No. 40 


Technical Editor: 

Fred Nachbaur 
r. C-12, Mtn. Stn. Group Box 
Nelson, BC VIL 5P1 Canada 


Subscriptions, Advertising: 
Jeffrey Moore 

502 S. Mill Street 
Louisville, OH 44641 


Subscribe ! 


For Canada and Mexico please add $3.00 postage. 


be sent to the Indiana address. 


$ 16.95 


Copyright 1988 SyncWare News 1 year (6 issues ) 

















